home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 14
/
014.d81
/
xdos boot
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
379b
|
15 lines
1 rem xdos boot
10 print"[147] 1. [210][213][206] [216][196][207][211] [195]reator"
12 print" 2. [210]eturn to [204][207][193][196][211][212][193][210]"
14 print"[215]hich ? ";
16 poke198,0:wait198,1:geta$
18 ifa$<>"1"anda$<>"2"then poke53280,rnd(1)*15:goto16
20 :
22 ifa$="1"thenf$="xdos creator"
24 ifa$="2"thenf$="payload"
26 printa$
28 print"loading "f$
30 :
63000 print"[147]load"chr$(34)f$chr$(34) ",8":print"run"
63010 poke631,13:poke632,13:poke198,2: end